home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Info-Mac 1992 August
/
info-mac-1992.iso
/
Source
/
3D GrafSys
/
GrafSys.rel
/
GrafLib.Fixed
/
Screen3D.fix.int
< prev
next >
Wrap
Text File
|
1992-04-12
|
1KB
|
32 lines
unit Screen3D;
interface
uses
GrafSys;
(* Matrix, Transformations, Data3D, ResourceAccess, Grafsys; *)
(* simple 3D drawing commands *)
procedure MoveTo3D (x, y, z: Real);
procedure LineTo3D (x, y, z: Real);
(* routines to draw object on screen *)
procedure DrawObject (theObject: GrafObjPtr);
procedure fDrawObject (theObject: GrafObjPtr);
(* routines affecting ScreenObjects *)
function NewScreenObject: ScreenObjPtr; (* allocate mem for Screenobject & init it *)
procedure UpdateScreenObject (theObject: GrafObjPtr);
procedure CalcScreenObject (theObject: grafObjPtr; forceCalc: Boolean);
procedure AttachScreenObject (theScrnObj: ScreenObjPtr; theObject: GrafObjPtr);
procedure UnLinkScreenObject (theObject: GrafObjPtr; var theScrnObj: ScreenObjPtr);
procedure DrawScreenObject (theObject: GrafObjPtr);
(* routines for clipped Line-Drawing *)
procedure CCalcScreenObject (theObject: grafObjPtr; forceCalc: Boolean);
(* routines for Hidden Line/surface drawing *)
procedure DrawHLScreenObject (theObject: grafObjPtr);
implementation
end.